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TEMPORARY STORAGE 0, 1, 2, 3, **■• 

ACCURACY Exact 

DURATION 3 m.s. per digit. The time is determined solely by the 

input speed. 
DESCRIPTION This routine at location r is called into used by the orders 



nF -* sei: tr~±%the first of the sequence 
50 qF of locations at -which the integers 
26 rF are stored. 



+ 1 



Each integer on the tape is preceded by a sign and up 
to 12 decimal characters . The last number on the tape is terminated by an 
N, J, F or L. The last number on the tape is a sum check and is the signed 
sum of all previous integers which have been read in* This sum can be com- 
puted by adding all previous numbers regardless of overflow in the accumulator. 
The sum check is not stored in the memory but is compared with the sum of the 
previous numbers as computed above. If the sum does not agree control is trans- 
ferred back to the routine and the computer stop's, whereupon the operator 
may reset the tape and with the black switch input the sequence again. If the 
sum agrees with the last number then control is transferred to the main routine 
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K5 F 
k2 -22L 




Link 
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10 20F 
40 2F 




Store address of 1st location 




2 


L5 2F 
^2 1% 




Plant address of 1st location 
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8l kF 
LO 2^-L 




~" Plant sign of 1st number 




k 


to 5f 

4l 4F 




Clear sum storage 
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L5 3F 
kO IF 




Store + or - 
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81 W 
22 8L 




read next character. 
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50 F 
7^ 2-H-L 
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00 39F- 
- 40 F 
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81 hF 
LO 24i 




" Form |n[ 
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32 11L 
Lk 2^L 








11 


26 7L 
kO 3F 
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LO 25L 
32 18L 




to 

Test for terminating symbol 
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LI IF 
36 15L 
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LI F 
ho F 




Reverse sign 
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L5 F 
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40 ( )F 




Store 
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16 


iA ^F 








kO 4F 




- Accumulate sum 


IT 


F5 15L 








40 15L 




Increase store address 


18 


26 5L 




get next number 




■LI IF 
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32 20L 

T n TTl 

Jj-L J? 
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^0 F 








L5 F 




Reverse sign of sum check number 


21 


LO k¥ 








kO 3P 




Sum check number - Sum 


22 


L3 3F 








32 ( )F 




Sum check link out 
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2k 2L 




transfer to do over and stop 




00 F 




waste 


2k 


00 F 
00 10F 






25 


00 F 








00 2F, 
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